In kbqt14/PaqueteExamenUNGS: Este paquete me ayuda a hacer tablas

knitr::opts_chunk$set(echo = TRUE)
install.packages("roxygen2")
require(roxygen2)
require(devtools)
install_github("kbqt14/PaqueteExamenUNGS")
install.packages("dplyr")
install.packages("PaqueteExamenUNGS")

install.packages("devtools")
require("devtools")
install.packages("dplyr")
require(dplyr)
devtools::use_data(DatosCeibo)
DatosCeibo <-read.delim("Data/DatosCeibo.txt")

require(PaqueteExamenUNGS)
Tabla5(DatosCeibo)
Tabla3(DatosCeibo)
ParaGraficar5<- Tabla5(DatosCeibo)
table(ParaGraficar5)

library(ggplot2)
ggplot(ParaGraficar5,aes(as.factor(x=Tratamiento),y=Longitud))+geom_bar(stat="identity",width = 0.8)+scale_x_discrete(breaks=c("0","5","10","50","70","100","200","300","400","500"))+  scale_x_discrete(expand = expand_scale(add = 2)) +labs(x = "Tratamientos",y = "Longitud de vastago")